home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 9 / FM Towns Free Software Collection 9.iso / taropyon / silib / inc / siwl.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-11-16  |  5.9 KB  |  179 lines
  1. #ifndef    _SIWL_H
  2. #define    _SIWL_H
  3.  
  4. #ifndef    _SIWIN_H
  5. #    include    <siwin.h>
  6. #endif
  7. #ifndef    _SISCN_H
  8. #    include    <siscn.h>
  9. #endif
  10.  
  11. /*    "wl_101.c"        ----------------------------------------------------*/
  12. extern int        WL_chkFr( FRAME_T *fr );
  13.  
  14. /*    "wl_line.c"        ----------------------------------------------------*/
  15. extern void    WL_line( struct _scnline_t *para );
  16.  
  17. #define    WL_LINE(_x1,_y1,_x2,_y2,_mdWrt,_col)                    \
  18. {    struct _scnline_t    _para;                                    \
  19.     _para.egbPara.n  = 2;                                        \
  20.     _para.egbPara.x1 = (_x1);    _para.egbPara.y1 = (_y1);        \
  21.     _para.egbPara.x2 = (_x2);    _para.egbPara.y2 = (_y2);        \
  22.     _para.fnc.col    = (_col)    _para.fnc.tile   = NULL;        \
  23.     _para.fnc.mdWrt  = (_mdWrt);                                \
  24.     WL_line( &_para );                                            \
  25. }
  26.  
  27. /*    "wl_vline.c"        ----------------------------------------------------*/
  28. extern void    WL_vline( struct _scnline_t *para );
  29.  
  30. #define    WL_VLINE(_x1,_y1,_x2,_y2,_mdWrt,_col)                    \
  31. {    struct _scnline_t    _para;                                    \
  32.     _para.egbPara.n  = 2;                                        \
  33.     _para.egbPara.x1 = (_x1);    _para.egbPara.y1 = (_y1);        \
  34.     _para.egbPara.x2 = (_x1);    _para.egbPara.y2 = (_y2);        \
  35.     _para.fnc.col    = (_col);                                    \
  36.     _para.fnc.tile   = NULL;                                    \
  37.     _para.fnc.mdWrt  = (_mdWrt);                                \
  38.     WL_vline( &_para );                                            \
  39. }
  40.  
  41. /*    "wl_hline.c"        ----------------------------------------------------*/
  42. extern void    WL_hline( struct _scnline_t *para );
  43.  
  44. #define    WL_HLINE(_x1,_y1,_x2,_y2,_mdWrt,_col)                    \
  45. {    struct _scnline_t    _para;                                    \
  46.     _para.egbPara.n  = 2;                                        \
  47.     _para.egbPara.x1 = (_x1);    _para.egbPara.y1 = (_y1);        \
  48.     _para.egbPara.x2 = (_x2);    _para.egbPara.y2 = (_y1);        \
  49.     _para.fnc.col    = (_col);                                    \
  50.     _para.fnc.tile   = NULL;                                    \
  51.     _para.fnc.mdWrt  = (_mdWrt);                                \
  52.     WL_hline( &_para );                                            \
  53. }
  54.  
  55. /*    "wl_box.c"        ----------------------------------------------------*/
  56. extern void    WL_box( struct _scnbox_t *para );
  57.  
  58. #define    WL_BOX(_x1,_y1,_x2,_y2,_mdWrt,_col)                        \
  59. {    struct _scnbox_t    _para;                                    \
  60.     _para.egbPara.x1 = (_x1);    _para.egbPara.y1 = (_y1);        \
  61.     _para.egbPara.x2 = (_x2);    _para.egbPara.y2 = (_y2);        \
  62.     _para.fnc.col    = (_col);    _para.fnc.tile   = NULL;        \
  63.     _para.fnc.mdWrt  = (_mdWrt);                                \
  64.     WL_box( &_para );                                            \
  65. }
  66.  
  67. /*    "wl_boxf.c"        ----------------------------------------------------*/
  68. extern void    WL_boxf( struct _scnboxf_t *para );
  69.  
  70. #define    WL_BOXF(_x1,_y1,_x2,_y2,_mdWrt,_col)                \
  71. {    struct _scnboxf_t    _para;                                \
  72.     _para.egbPara.x1 = (_x1);    _para.egbPara.y1 = (_y1);    \
  73.     _para.egbPara.x2 = (_x2);    _para.egbPara.y2 = (_y2);    \
  74.     _para.fnc.col    = (_col);    _para.fnc.tile   = NULL;    \
  75.     _para.fnc.mdWrt  = (_mdWrt);                            \
  76.     WL_boxf( &_para );                                        \
  77. }
  78.  
  79. /*    "wl_boxc.c"        ----------------------------------------------------*/
  80. extern void    WL_boxcon( struct _scnboxcon_t *para );
  81. extern int        SiWlPutsX;
  82.  
  83. #define    WL_BOXCON(_x1,_y1,_x2,_y2,_n,_mdWrt,_col1,_col2)        \
  84. {    struct _scnboxcon_t    _para;                                    \
  85.     _para.fr.x1       = (_x1);    _para.fr.y1       = (_y1);        \
  86.     _para.fr.x2       = (_x2);    _para.fr.y2       = (_y2);        \
  87.     _para.n           = (_n);                                    \
  88.     _para.fnc1.col    = (_col1);    _para.fnc1.tile   = NULL;    \
  89.     _para.fnc1.mdWrt  = (_mdWrt);                                \
  90.     _para.fnc2.col    = (_col2);    _para.fnc2.tile   = NULL;    \
  91.     _para.fnc2.mdWrt  = (_mdWrt);                                \
  92.     WL_boxcon( &_para );                                        \
  93. }
  94.  
  95. /*    "wl_boxfc.c"    ----------------------------------------------------*/
  96. void    WL_boxfcon( struct _scnboxfcon_t *para );
  97.  
  98. #define    WL_BOXFCON(_x1,_y1,_x2,_y2,_n,_mdWrt,_col1,_col2,_col3)    \
  99. {    struct _scnboxfcon_t _para;        \
  100.     _para.fr.x1       = (_x1);        \
  101.     _para.fr.y1       = (_y1);        \
  102.     _para.fr.x2       = (_x2);        \
  103.     _para.fr.y2       = (_y2);        \
  104.     _para.n           = (_n);        \
  105.     _para.fnc1.col    = (_col1);    \
  106.     _para.fnc1.tile   = NULL;        \
  107.     _para.fnc1.mdWrt  = (_mdWrt);    \
  108.     _para.fnc2.col    = (_col2);    \
  109.     _para.fnc2.tile   = NULL;        \
  110.     _para.fnc2.mdWrt  = (_mdWrt);    \
  111.     _para.fnc3.col    = (_col3);    \
  112.     _para.fnc3.tile   = NULL;        \
  113.     _para.fnc3.mdWrt  = (_mdWrt);    \
  114.     WL_boxfcon( &_para );            \
  115. }
  116.  
  117. /*    "wl_puts.c"    --------------------------------------------------------*/
  118. extern void    WL_puts( struct _scnputs_t *para );
  119.  
  120. #define    WL_PUTS(_fts,_s,_x,_y,_mdWrt,_col,_bac)    \
  121. {    struct _scnputs_t _para;        \
  122.     _para.fts        = (_fts);        \
  123.     _para.point.x    = (_x);        \
  124.     _para.point.y    = (_y);        \
  125.     _para.ffnc.col   = (_col);        \
  126.     _para.ffnc.tile  = NULL;        \
  127.     _para.ffnc.mdWrt = (_mdWrt);    \
  128.     _para.bfnc.col   = (_bac);        \
  129.     _para.bfnc.tile  = NULL;        \
  130.     _para.bfnc.mdWrt = (_mdWrt);    \
  131.     _para.s          = (_s);        \
  132.     WL_puts( &_para );                \
  133. }
  134.  
  135. /*    "wl_pimg.c"    --------------------------------------------------------*/
  136. void    WL_putimg( struct _scnimg_t *para );
  137.  
  138. #define    WL_PUTIMG(_pixel,_siz,_dat,_ds,_x1,_y1,_x2,_y2,_mdWrt,_col,_bac)    \
  139. {    struct _scnimg_t _para;            \
  140.     _para.pixel = (_pixel);            \
  141.     _para.siz   = (_siz);            \
  142.     _para.egbPara.dat = (_dat);        \
  143.     _para.egbPara.ds  = (_ds);        \
  144.     _para.egbPara.x1  = (_x1);        \
  145.     _para.egbPara.y1  = (_y1);        \
  146.     _para.egbPara.x2  = (_x2);        \
  147.     _para.egbPara.y2  = (_y2);        \
  148.     _para.ffnc.col    = (_col);        \
  149.     _para.ffnc.tile   = NULL;        \
  150.     _para.ffnc.mdWrt  = (_mdWrt);    \
  151.     _para.bfnc.col    = (_bac);        \
  152.     _para.bfnc.tile   = NULL;        \
  153.     _para.bfnc.mdWrt  = (_mdWrt);    \
  154.     WL_putimg( &_para );            \
  155. }
  156. #define    WL_PUTIMGPTN(_img,_x,_y,_mdWrt,_col,_bac)    \
  157. {    struct _scnimg_t    _para;            \
  158.     _para.pixel = (_img)->pixel;        \
  159.     _para.siz   = (_img)->siz;            \
  160.     _para.egbPara.dat = (_img)->dat;    \
  161.     _para.egbPara.ds  = getds();        \
  162.     _para.egbPara.x1  = _x;                \
  163.     _para.egbPara.y1  = _y;                \
  164.     _para.egbPara.x2  = _para.egbPara.x1 + (_img)->xs - 1;    \
  165.     _para.egbPara.y2  = _para.egbPara.y1 + (_img)->ys - 1;    \
  166.     _para.ffnc.col    = (_col);            \
  167.     _para.ffnc.tile   = NULL;            \
  168.     _para.ffnc.mdWrt  = (_mdWrt);        \
  169.     _para.bfnc.col    = (_bac);            \
  170.     _para.bfnc.tile   = NULL;            \
  171.     _para.bfnc.mdWrt  = (_mdWrt);        \
  172.     WL_putimg( &_para );                \
  173. }
  174.  
  175. /*    "wl_pblk.c"    --------------------------------------------------------*/
  176. extern void    WL_dspblk( SCNBLK_T *blk, int x, int y );
  177.  
  178. #endif
  179.